home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1998 January / macformat-059.iso / mac / Demos / Martial Arts Demo / media / exit.Dxr / Internal_5.ls < prev    next >
Encoding:
Text File  |  1997-09-30  |  1.5 KB  |  52 lines
  1. on exitFrame
  2.   scrollingFrames()
  3.   repeat with a = 8 to 11
  4.     if rollOver(a) and the mouseDown then
  5.       case the rollOver of
  6.         8:
  7.           puppetSound("PUNCH")
  8.           puppetSprite(8, 1)
  9.           set the member of sprite 8 to member (the memberNum of sprite 8 + 1) of castLib "graphics"
  10.           updateStage()
  11.           sixthSecDel()
  12.           puppetSprite(8, 0)
  13.           updateStage()
  14.           go("SPLASH")
  15.         9:
  16.           cursorSign()
  17.           puppetSound("PUNCH")
  18.           puppetSprite(9, 0)
  19.           set the member of sprite 9 to member (the memberNum of sprite 9 + 1) of castLib "graphics"
  20.           updateStage()
  21.           sixthSecDel()
  22.           puppetSprite(9, 0)
  23.           updateStage()
  24.           repeat with a = 1 to 48
  25.             puppetSprite(a, 0)
  26.           end repeat
  27.           go("blackout")
  28.           go("main", "main.dir")
  29.           abort()
  30.         10:
  31.           puppetSound("PUNCH")
  32.           puppetSprite(10, 1)
  33.           set the member of sprite 10 to member (the memberNum of sprite 10 + 1) of castLib "graphics"
  34.           updateStage()
  35.           sixthSecDel()
  36.           puppetSprite(10, 0)
  37.           updateStage()
  38.           go("CTVCREDS")
  39.         11:
  40.           puppetSound("GRUNT")
  41.           puppetSprite(11, 1)
  42.           set the member of sprite 11 to member (the memberNum of sprite 11 + 1) of castLib "graphics"
  43.           updateStage()
  44.           sixthSecDel()
  45.           puppetSprite(11, 0)
  46.           updateStage()
  47.       end case
  48.     end if
  49.   end repeat
  50.   go(the frame)
  51. end
  52.